home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Tools / Development / PowerD / powerd / source / lib / powerd_lib.lha / PowerD / CtrlE.ass < prev    next >
Text File  |  2000-04-16  |  272b  |  20 lines
  1.  
  2.     xdef    _CtrlE
  3.  
  4. _CtrlE    move.l    a6,(a7)+
  5.     moveq    #0,d0
  6.     moveq    #0,d1
  7.     movea.l    $4.w,a6
  8.     jsr    -306(a6)        ; SetSignal()
  9.     btst    #14,d0
  10.     beq.s    .no
  11.     moveq    #0,d0
  12.     move.l    #16384,d1
  13.     jsr    -306(a6)        ; SetSignal()
  14. .yes    moveq    #-1,d0
  15.     move.l    (a7)+,a6
  16.     rts
  17. .no    moveq    #0,d0
  18.     move.l    (a7)+,a6
  19.     rts
  20.